home *** CD-ROM | disk | FTP | other *** search
/ Hardcore Visual Basic 5.0 (2nd Edition) / Hardcore Visual Basic 5.0 - Second Edition (1997)(Microsoft Press).iso / Code / ifilter.cls < prev    next >
Text File  |  1997-06-14  |  619b  |  31 lines
  1. VERSION 1.0 CLASS
  2. BEGIN
  3.   MultiUse = -1  'True
  4. END
  5. Attribute VB_Name = "IFilter"
  6. Attribute VB_GlobalNameSpace = False
  7. Attribute VB_Creatable = False
  8. Attribute VB_PredeclaredId = False
  9. Attribute VB_Exposed = True
  10. Option Explicit
  11.  
  12. Enum EChunkAction
  13.     ecaAbort
  14.     ecaSkip
  15.     ecaTranslate
  16. End Enum
  17.  
  18. Property Get Source() As String
  19. End Property
  20. Property Let Source(sSourceA As String)
  21. End Property
  22.  
  23. Property Get Target() As String
  24. End Property
  25. Property Let Target(sTargetA As String)
  26. End Property
  27.  
  28. Function Translate(sChunkA As String, ByVal iChunkA As Long) As EChunkAction
  29. End Function
  30. '
  31.